#pragma rtGlobals= 2
// #include "Utility_JZT"

//printf "\r%s  %s  restarting this file\r\r",date(),time()


Function AfterFileOpenHook(refNum,file,pathName,type,creator,kind)
	Variable refNum, kind
	String file,pathName,type,creator
	if ((kind==1) || (kind==2))		// an experiment (packed or unpacked)
		PathInfo $pathName				// expand the path name, "/Users/name/data/Copper" is better than "home'
		pathName = SelectString(V_flag,pathName+":",S_path)
		printf "\r%s  %s  restarting this file from '%s%s'\r\r",date(),time(),pathName,file
	endif
End
Function IgorStartOrNewHook(IgorApplicationNameStr)
	String IgorApplicationNameStr
//	PathInfo Igor			// put path value into (local) S_Path
//	printf "%s  %s  starting this file from '%s'\r\r",date(),time(),S_Path
	GetWindow kwCmdHist wsize
	V_right = (V_right>900) ? V_right-100 : V_right
	MoveWindow /C V_left+20,V_top-40,V_right,V_bottom-2
End